Problem 1

  1. GCD Function

gcd flowchart

gcd(72, 8)
## [1] 8
gcd(-1, 531)
## [1] 1
gcd(47011, 73618)
## [1] 1
  1. LCM Function

LCM Flowchart

lcm(c(12, 21))
## [1] 3
## [1] 84
lcm(c(4789, 6123, 199))
## [1] 1
## [1] 1
## [1] 5835286353

Problem 2

  1. is_prime Function

is_prime Flowchart

is_prime(c(9, 7, 1))
## [1] FALSE  TRUE FALSE
  1. get_factors Function

get_factors Flowchart

get_factors(1920)
## [1] TRUE
## [1] TRUE
## [1] FALSE
## [1] TRUE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## [1] FALSE
## $primes
## [1] 2 3 5
## 
## $exponents
## [1] 43.817805 12.428930  4.535866